﻿t:= WinExist("计算器")
if t
{
    MsgBox("已运行")
} else {
    MsgBox("还没有运行")
}